########################
########################
###Summary Statistics###
########################
########################

#########
###DVs###
#########
#outbreak_event
c(min(dis.dat$outbreak_event, na.rm=TRUE),median(dis.dat$outbreak_event, na.rm=TRUE),mean(dis.dat$outbreak_event, na.rm=TRUE),max(dis.dat$outbreak_event, na.rm=TRUE),sd(dis.dat$outbreak_event, na.rm=TRUE))
#flus_all
c(min(dis.dat$flus_all, na.rm=TRUE),median(dis.dat$flus_all, na.rm=TRUE),mean(dis.dat$flus_all, na.rm=TRUE),max(dis.dat$flus_all, na.rm=TRUE),sd(dis.dat$flus_all, na.rm=TRUE))
#fevers_all
c(min(dis.dat$fevers_all, na.rm=TRUE),median(dis.dat$fevers_all, na.rm=TRUE),mean(dis.dat$fevers_all, na.rm=TRUE),max(dis.dat$fevers_all, na.rm=TRUE),sd(dis.dat$fevers_all, na.rm=TRUE))
#resp_all
c(min(dis.dat$resp_all, na.rm=TRUE),median(dis.dat$resp_all, na.rm=TRUE),mean(dis.dat$resp_all, na.rm=TRUE),max(dis.dat$resp_all, na.rm=TRUE),sd(dis.dat$resp_all, na.rm=TRUE))
#Affected1000000
c(min(dis.dat$Affected1000000, na.rm=TRUE),median(dis.dat$Affected1000000, na.rm=TRUE),mean(dis.dat$Affected1000000, na.rm=TRUE),max(dis.dat$Affected1000000, na.rm=TRUE),sd(dis.dat$Affected1000000, na.rm=TRUE))
#Affected_flus_all1000000
c(min(dis.dat$Affected_flus_all1000000, na.rm=TRUE),median(dis.dat$Affected_flus_all1000000, na.rm=TRUE),mean(dis.dat$Affected_flus_all1000000, na.rm=TRUE),max(dis.dat$Affected_flus_all1000000, na.rm=TRUE),sd(dis.dat$Affected_flus_all1000000, na.rm=TRUE))
#cause_poultry
c(min(dis.dat$cause_poultry, na.rm=TRUE),median(dis.dat$cause_poultry, na.rm=TRUE),mean(dis.dat$cause_poultry, na.rm=TRUE),max(dis.dat$cause_poultry, na.rm=TRUE),sd(dis.dat$cause_poultry, na.rm=TRUE))
#cause_pig
c(min(dis.dat$cause_pig, na.rm=TRUE),median(dis.dat$cause_pig, na.rm=TRUE),mean(dis.dat$cause_pig, na.rm=TRUE),max(dis.dat$cause_pig, na.rm=TRUE),sd(dis.dat$cause_pig, na.rm=TRUE))
#cause_poultry_flus
c(min(dis.dat$cause_poultry_flus, na.rm=TRUE),median(dis.dat$cause_poultry_flus, na.rm=TRUE),mean(dis.dat$cause_poultry_flus, na.rm=TRUE),max(dis.dat$cause_poultry_flus, na.rm=TRUE),sd(dis.dat$cause_poultry_flus, na.rm=TRUE))
#logsanction_viol
c(min(dis.dat$cause_pig_flus, na.rm=TRUE),median(dis.dat$cause_pig_flus, na.rm=TRUE),mean(dis.dat$cause_pig_flus, na.rm=TRUE),max(dis.dat$cause_pig_flus, na.rm=TRUE),sd(dis.dat$cause_pig_flus, na.rm=TRUE))

#########
###IVs###
#########
#cattle_meat_tonnes1000000
c(min(dis.dat$cattle_meat_tonnes1000000, na.rm=TRUE),median(dis.dat$cattle_meat_tonnes1000000, na.rm=TRUE),mean(dis.dat$cattle_meat_tonnes1000000, na.rm=TRUE),max(dis.dat$cattle_meat_tonnes1000000, na.rm=TRUE),sd(dis.dat$cattle_meat_tonnes1000000, na.rm=TRUE))
#chicken_meat_tonnes1000000
c(min(dis.dat$chicken_meat_tonnes1000000, na.rm=TRUE),median(dis.dat$chicken_meat_tonnes1000000, na.rm=TRUE),mean(dis.dat$chicken_meat_tonnes1000000, na.rm=TRUE),max(dis.dat$chicken_meat_tonnes1000000, na.rm=TRUE),sd(dis.dat$chicken_meat_tonnes1000000, na.rm=TRUE))
#pigs_meat_tonnes1000000
c(min(dis.dat$pigs_meat_tonnes1000000, na.rm=TRUE),median(dis.dat$pigs_meat_tonnes1000000, na.rm=TRUE),mean(dis.dat$pigs_meat_tonnes1000000, na.rm=TRUE),max(dis.dat$pigs_meat_tonnes1000000, na.rm=TRUE),sd(dis.dat$pigs_meat_tonnes1000000, na.rm=TRUE))
#logpopulation
c(min(dis.dat$logpopulation, na.rm=TRUE),median(dis.dat$logpopulation, na.rm=TRUE),mean(dis.dat$logpopulation, na.rm=TRUE),max(dis.dat$logpopulation, na.rm=TRUE),sd(dis.dat$logpopulation, na.rm=TRUE))
#logGDPpc
c(min(dis.dat$logGDPpc, na.rm=TRUE),median(dis.dat$logGDPpc, na.rm=TRUE),mean(dis.dat$logGDPpc, na.rm=TRUE),max(dis.dat$logGDPpc, na.rm=TRUE),sd(dis.dat$logGDPpc, na.rm=TRUE))
#cattle_meat_PI
c(min(dis.dat$cattle_meat_PI, na.rm=TRUE),median(dis.dat$cattle_meat_PI, na.rm=TRUE),mean(dis.dat$cattle_meat_PI, na.rm=TRUE),max(dis.dat$cattle_meat_PI, na.rm=TRUE),sd(dis.dat$cattle_meat_PI, na.rm=TRUE))
#chicken_meat_PI
c(min(dis.dat$chicken_meat_PI, na.rm=TRUE),median(dis.dat$chicken_meat_PI, na.rm=TRUE),mean(dis.dat$chicken_meat_PI, na.rm=TRUE),max(dis.dat$chicken_meat_PI, na.rm=TRUE),sd(dis.dat$chicken_meat_PI, na.rm=TRUE))
#pigs_meat_PI
c(min(dis.dat$pigs_meat_PI, na.rm=TRUE),median(dis.dat$pigs_meat_PI, na.rm=TRUE),mean(dis.dat$pigs_meat_PI, na.rm=TRUE),max(dis.dat$pigs_meat_PI, na.rm=TRUE),sd(dis.dat$pigs_meat_PI, na.rm=TRUE))
#logcattle.meat.imp_1kusd
c(min(dis.dat$logcattle.meat.imp_1kusd, na.rm=TRUE),median(dis.dat$logcattle.meat.imp_1kusd, na.rm=TRUE),mean(dis.dat$logcattle.meat.imp_1kusd, na.rm=TRUE),max(dis.dat$logcattle.meat.imp_1kusd, na.rm=TRUE),sd(dis.dat$logcattle.meat.imp_1kusd, na.rm=TRUE))
#logchicken.meat.imp_1kusd
c(min(dis.dat$logchicken.meat.imp_1kusd, na.rm=TRUE),median(dis.dat$logchicken.meat.imp_1kusd, na.rm=TRUE),mean(dis.dat$logchicken.meat.imp_1kusd, na.rm=TRUE),max(dis.dat$logchicken.meat.imp_1kusd, na.rm=TRUE),sd(dis.dat$logchicken.meat.imp_1kusd, na.rm=TRUE))
#logpigs.meat.imp_1kusd
c(min(dis.dat$logpigs.meat.imp_1kusd, na.rm=TRUE),median(dis.dat$logpigs.meat.imp_1kusd, na.rm=TRUE),mean(dis.dat$logpigs.meat.imp_1kusd, na.rm=TRUE),max(dis.dat$logpigs.meat.imp_1kusd, na.rm=TRUE),sd(dis.dat$logpigs.meat.imp_1kusd, na.rm=TRUE))
#logcattle.meat.exp_1kusd
c(min(dis.dat$logcattle.meat.exp_1kusd, na.rm=TRUE),median(dis.dat$logcattle.meat.exp_1kusd, na.rm=TRUE),mean(dis.dat$logcattle.meat.exp_1kusd, na.rm=TRUE),max(dis.dat$logcattle.meat.exp_1kusd, na.rm=TRUE),sd(dis.dat$logcattle.meat.exp_1kusd, na.rm=TRUE))
#logchicken.meat.exp_1kusd
c(min(dis.dat$logchicken.meat.exp_1kusd, na.rm=TRUE),median(dis.dat$logchicken.meat.exp_1kusd, na.rm=TRUE),mean(dis.dat$logchicken.meat.exp_1kusd, na.rm=TRUE),max(dis.dat$logchicken.meat.exp_1kusd, na.rm=TRUE),sd(dis.dat$logchicken.meat.exp_1kusd, na.rm=TRUE))
#logpigs.meat.exp_1kusd
c(min(dis.dat$logpigs.meat.exp_1kusd, na.rm=TRUE),median(dis.dat$logpigs.meat.exp_1kusd, na.rm=TRUE),mean(dis.dat$logpigs.meat.exp_1kusd, na.rm=TRUE),max(dis.dat$logpigs.meat.exp_1kusd, na.rm=TRUE),sd(dis.dat$logpigs.meat.exp_1kusd, na.rm=TRUE))

#################
###Instruments###
#################
#comb.np.use_tonnes1000000
c(min(dis.dat$comb.np.use_tonnes1000000, na.rm=TRUE),median(dis.dat$comb.np.use_tonnes1000000, na.rm=TRUE),mean(dis.dat$comb.np.use_tonnes1000000, na.rm=TRUE),max(dis.dat$comb.np.use_tonnes1000000, na.rm=TRUE),sd(dis.dat$comb.np.use_tonnes1000000, na.rm=TRUE))
#nitrogen.use_tonnes1000000
c(min(dis.dat$nitrogen.use_tonnes1000000, na.rm=TRUE),median(dis.dat$nitrogen.use_tonnes1000000, na.rm=TRUE),mean(dis.dat$nitrogen.use_tonnes1000000, na.rm=TRUE),max(dis.dat$nitrogen.use_tonnes1000000, na.rm=TRUE),sd(dis.dat$nitrogen.use_tonnes1000000, na.rm=TRUE))
#phosphate.use_tonnes1000000
c(min(dis.dat$phosphate.use_tonnes1000000, na.rm=TRUE),median(dis.dat$phosphate.use_tonnes1000000, na.rm=TRUE),mean(dis.dat$phosphate.use_tonnes1000000, na.rm=TRUE),max(dis.dat$phosphate.use_tonnes1000000, na.rm=TRUE),sd(dis.dat$phosphate.use_tonnes1000000, na.rm=TRUE))


